home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus 2000 #1 / Amiga Plus CD - 2000 - No. 1.iso / Tools / HD / SmartInfo / Install < prev    next >
Encoding:
Text File  |  1999-12-03  |  1.1 KB  |  63 lines
  1. (set #dirname       "SmartInfo")
  2.  
  3. (if (= @language "suomi")
  4.     (
  5.     (set #destdir-prompt "Minne haluat asentaa ohjelman? Uusi hakemisto luodaan nimellä 'SmartInfo'.")
  6.     (set #catchoice-prompt "Mitkä ylimääräiset kielet haluat asentaa?")
  7.     )
  8.  
  9. ;       English
  10.  
  11.     (
  12.     (set #destdir-prompt "Where should Voimariini be installed? A drawer named 'SmartInfo' will be created there.")
  13.     (set #catchoice-prompt "Which additional languages do you want to install? English already installed.")
  14.     )
  15. )
  16.  
  17. (set @default-dest
  18.     (askdir
  19.         (prompt #destdir-prompt)
  20.         (help @makedir-help)
  21.         (disk)
  22.         (default "")
  23.         (newpath)
  24.     )
  25. )
  26.  
  27. (set @default-dest
  28.     (tackon @default-dest #dirname)
  29. )
  30. (set #catalogs
  31.     (tackon @default-dest "Catalogs")
  32. )
  33.  
  34. (makedir @default-dest
  35.     (infos)
  36. )
  37.  
  38. (copyfiles
  39.     (source "")
  40.     (dest   @default-dest)
  41.     (pattern "SmartInfo#?")
  42. )
  43.  
  44.  
  45. (makedir #catalogs)
  46.  
  47. (copyfiles
  48.     (prompt #catchoice-prompt)
  49.     (help   @askchoice-help)
  50.     (source "Catalogs")
  51.     (dest   #catalogs)
  52.     (choices "Deutsch" "Français")
  53.     (nogauge)
  54.     (confirm)
  55. )
  56.  
  57. (copyfiles
  58.     (source "Catalogs")
  59.     (pattern "#?.c?")
  60.     (dest   #catalogs)
  61.     (nogauge)
  62. )
  63.